(byte-compile-inline-expand):

If the function definition is not a lambda, return original FORM
with no error.

diff --git a/lisp/emacs-lisp/byte-opt.el b/lisp/emacs-lisp/byte-opt.el
index 4cf9548e8fb42b3f717c3b569bf0d69a96182a07..a279c018e705f12a42a3ae1ca1fc2a17ed841233 100644 (file)
--- a/lisp/emacs-lisp/byte-opt.el
+++ b/lisp/emacs-lisp/byte-opt.el
@@ -278,8 +278,10 @@
              (cons (list 'lambda (aref fn 0)
                          (list 'byte-code string (aref fn 2) (aref fn 3)))
                    (cdr form)))
-         (if (not (eq (car fn) 'lambda)) (error "%s is not a lambda" name))
-         (cons fn (cdr form)))))))
+         (if (eq (car-safe fn) 'lambda)
+             (cons fn (cdr form))
+           ;; Give up on inlining.
+           form))))))
 
 ;;; ((lambda ...) ...)
 ;;;